home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 April: Mac OS SDK / Dev.CD Apr 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / Timer.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  2.2 KB  |  104 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Timer.a
  3. ;
  4. ;    Contains:    Time Manager interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__TIMER__') = 'UNDEFINED' THEN
  21. __TIMER__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28.  
  29.     IF &TYPE('__OSUTILS__') = 'UNDEFINED' THEN
  30.     include 'OSUtils.a'
  31.     ENDIF
  32. ;        include 'MixedMode.a'                                        ;
  33. ;        include 'Memory.a'                                            ;
  34.  
  35. ; high bit of qType is set if task is active 
  36. kTMTaskActive                    EQU        (1 << 15)
  37.  
  38. ; typedef struct TMTask     TMTask, *TMTaskPtr
  39. TMTask                     RECORD    0
  40. qLink                     ds.l   1        ; offset: $0 (0)
  41. qType                     ds.w   1        ; offset: $4 (4)
  42. tmAddr                     ds.l   1        ; offset: $6 (6)
  43. tmCount                     ds.l   1        ; offset: $A (10)
  44. tmWakeUp                 ds.l   1        ; offset: $E (14)
  45. tmReserved                 ds.l   1        ; offset: $12 (18)
  46. sizeof                     EQU *            ; size:   $16 (22)
  47.                         ENDR
  48.  
  49. ;
  50. ; pascal void InsTime(QElemPtr tmTaskPtr)
  51. ;
  52.     IF ¬ GENERATINGCFM THEN
  53.         ; parameters: 
  54.         ;     tmTaskPtr         => A0
  55.         _InsTime:    OPWORD    $A058
  56.     ELSE
  57.         IMPORT_CFM_FUNCTION    InsTime
  58.     ENDIF
  59.  
  60. ;
  61. ; pascal void InsXTime(QElemPtr tmTaskPtr)
  62. ;
  63.     IF ¬ GENERATINGCFM THEN
  64.         ; parameters: 
  65.         ;     tmTaskPtr         => A0
  66.         _InsXTime:    OPWORD    $A458
  67.     ELSE
  68.         IMPORT_CFM_FUNCTION    InsXTime
  69.     ENDIF
  70.  
  71. ;
  72. ; pascal void PrimeTime(QElemPtr tmTaskPtr, long count)
  73. ;
  74.     IF ¬ GENERATINGCFM THEN
  75.         ; parameters: 
  76.         ;     tmTaskPtr         => A0
  77.         ;     count             => D0
  78.         _PrimeTime:    OPWORD    $A05A
  79.     ELSE
  80.         IMPORT_CFM_FUNCTION    PrimeTime
  81.     ENDIF
  82.  
  83. ;
  84. ; pascal void RmvTime(QElemPtr tmTaskPtr)
  85. ;
  86.     IF ¬ GENERATINGCFM THEN
  87.         ; parameters: 
  88.         ;     tmTaskPtr         => A0
  89.         _RmvTime:    OPWORD    $A059
  90.     ELSE
  91.         IMPORT_CFM_FUNCTION    RmvTime
  92.     ENDIF
  93.  
  94. ;
  95. ; pascal void Microseconds(UnsignedWide *microTickCount)
  96. ;
  97.     IF ¬ GENERATINGCFM THEN
  98.         _Microseconds:    OPWORD    $A193
  99.     ELSE
  100.         IMPORT_CFM_FUNCTION    Microseconds
  101.     ENDIF
  102.  
  103.     ENDIF ; __TIMER__
  104.